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List of Experiment 


Ex.No. Title of the exercises 


1 Network commands ( ipconfig, netstat, tracert, ping, arp) and 
wireshark tool for packet analysis 


2 Echo server implementation 
3 Chat server Implementation 
4 Remote command execution 


5 ARP/RARP implementation 


6 Downloading a web page using socket 


7 Implementation of FTP 


8 Encryption /Decryption 


Network Simulator(NS) 


9 Study of Network Simulator(NS) 


10 Implementation of TCP/IP data transfer 


11 Implementation and study of go back n protocol and selective 
repeat protocols 


12 Study of Network Topology — Bus, Star, Ring 


13 Implementation of routing Protocols such as Distance vector 
and Link state routing 


14 Simulate a mobile adhoc network 


15 Implement transport control protocol in sensor network 
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Ex1 :Study of Network commands 
AIM : 
To study the important network related commands. 


C:\>ping: Ping is the most basic TCP/IP command, and it’s the same as placing a phone call to your 
best friend. You pick up your telephone and dial a number, expecting your best friend to reply 
with —Hellol on the other end. Computers make phone calls to each other over a network by 
using a Ping command. The Ping commands main purpose is to place a phone call to another 
computer on the network, and request an answer. Ping has 2 options it can use to place a phone 
call to another computer on the network. It can use the computers name or IP address. 


C:\>arp —a: ARP is short form of address resolution protocol, It will show the IP address of your 
computer along with the IP address and MAC address of your router. 


C:\>hostname: This is the simplest of all TCP/IP commands. It simply displays the name of your 
computer. 


C:\>ipconfig: The ipconfig command displays information about the host (the computer your sitting 
at)computer TCP/IP configuration. 


C:\>ipconfig /all: This command displays detailed configuration information about your TCP/IP 
connection including Router, Gateway, DNS, DHCP, and type of Ethernet adapter in your system. 


C:\>Ipconfig /renew: Using this command will renew all your IP addresses that you are currently 
(leasing) borrowing from the DHCP server. This command is a quick problem solver if you are 
having connection issues, but does not work if you have been configured with a static IP address. 


C:\>Ipconifg /release: This command allows you to drop the IP lease from the DHCP server. 


C:\>ipconfig /flushdns: This command is only needed if you’re having trouble with your networks 
DNS configuration. The best time to use this command is after networkconfiguration frustration 
sets in, and you really need the computer to reply with flushed. 


C:\>nbtstat —a: This command helps solve problems with NetBIOS name resolution. (Nbt stands for 
NetBIOS over TCP/IP) 


C:\>netdiag: Netdiag is a network testing utility that performs a variety of network diagnostic tests, 
allowing you to pinpoint problems in your network. Netdiag isn’t installed by default, but can be 
installed from the Windows XP CD after saying no to the install. Navigate to the CD ROM drive 
letter and open the support\tools folder on the XPCD and click the setup.exe icon in the 
support\tools folder. 


C:\>netstat: Netstat displays a variety of statistics about a computers active TCP/IP connections. This 
tool is most useful when you’re having trouble with TCP/IP applications such as HTTP, and FTP. 
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C:\>nslookup: Nslookup is used for diagnosing DNS problems. If you can access a resource by 
specifying an IP address but not it's DNS you have a DNS problem. 


C:\>pathping: Pathping is unique to Window’s, and is basically a combination of the Ping and Tracert 
commands. Pathping traces the route to the destination address then launches a 25second test of 
each router along the way, gathering statistics on the rate of data loss along each hop. 


C:\>route: The route command displays the computers routing table. A typicalcomputer, with a single 
network interface, connected to a LAN, with a router is fairly simple and generally doesn’t pose 
any network problems. But if you’re having troubleaccessing other computers on your network, 
you can use the route command to make sure the entries in the routing table are correct. 


C:\>tracert: The tracert command displays a list of all the routers that a packet has to go through to 
get from the computer where tracert is run to any other computer on the internet. 


Wireshark 

Wireshark, a network analysis tool formerly known as Ethereal, captures packets in real time and 
display them in human-readable format. Wireshark includes filters, color coding, and other features 
that let you dig deep into network traffic and inspect individual packets. 

Capturing Packets 

After downloading and installing Wireshark, you can launch it and double-click the name of a network 
interface under Capture to start capturing packets on that interface. For example, if you want to capture 
traffic on your wireless network, click your wireless interface. You can configure advanced features by 
clicking Capture > Options, but this isn’t necessary for now. 


File Edit View Go Capture Analyze Statistics Telephony Wireless Tools 


© Ak |Ì == | Q (© CEE 


Capture 


using this filter: | D} [Ente a capture fi 


VMw 

Ethernet 2 Pa 
VMware Network Adapter VMnett A — f. 
Ethernet 
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As soon as you click the interface’s name, you’ll see the packets start to appear in real time. Wireshark 
captures each packet sent to or from your system. 


If you have promiscuous mode enabled—it’s enabled by default—you’ll also see all the other packets 
on the network instead of only packets addressed to your network adapter. To check if promiscuous 
mode is enabled, click Capture > Options and verify the —Enable promiscuous mode on all interfacesl 
checkbox is activated at the bottom of this window. 


File Edit View Go Capture Analyze Statistics Telephony Wireless Tools Help 
PIL PA NAKIISA ERE: 
y a display filter ... <Ctrl-/> 


Source Destination Protocol Length Info 
2031 36.951443 2607:f3b0:400e:c04:.. 2601:1c0:cf00:8961:.. TLSv1.2 120 Application Q 
2032 36.951504 2601:1c0:cf00:8961.:.. 2607:f3b0:400e:c04.... TCP 74 58841 + 443 | 
2033 36.951770 2601:1c0:cf00:8961.:.. 2607:f8b@:40@e:c@4:.. TLSv1.2 126 Application D 


2034 37.017175 2607:f3b0:400e:c04:.. 2601:1c0:cf00:8961:.. TCP 74 443 + 58841 | 
2035 27 916474 PRAI*1-A+cFAA*RAR1* IKAT-FRhA-ARAB-rAG: TED 197 [TCD ceoment 


> Frame 2032: 74 bytes on wire (592 bits), 74 bytes captured (592 bits) on interface @ 

> Ethernet II, Src: IntelCor 38:be:bd (7c:5c:f8:38:be:bd), Dst: AsustekC_35:e4:c8 (1c:87:2c 
> Internet Protocol Version 6, Src: 2601:1c0:cf00:8961:e182:3669:c103:5336, Dst: 2607:f8b0: 
> Transmission Control Protocol, Src Port: 58841, Dst Port: 443, Seq: 3873, Ack: 72837, Len 


lc 87 2c 35 e4 c8 7c 5c f8 38 be bd 86 dd 60 @4 ..,5..[\ .8....°. 
31 8f 00 14 06 40 26 01 01 cø cf 00 89 61 el 82 1....@&. .....a.. 
36 69 cl 03 53 36 26 07 f8 bð 40 Be Bc B4 PO BO 6i..S6&. ..@..... 
00 00 BG BO @@ 68 e5 d9 @1 bb 91 1f c7 c3 4e 79 

b8 21 50 10 01 04 50 42 00 BB 


© 7 WiFi: <ive capture in progress? || Packets: 2422 : Displayed: 2422 (100.0%) || F 


Page | 5 


Click the red —Stopl button near the top left corner of the window when you want to stop capturing 
traffic. 


File Edit View Go Capture Analyze Statistics Telephony Wireless Tools Help 
BAO RCE TRE TE LECCE 
LI App a display filter ... <Ctrl-/> 
Time Source Destination Protocol Length Info 


1 6.000000 fe80::1e87:2cff:fe3. ff02::1 ICMPv6 134 Router Advert 


5 2 17578) 199 148 9Q ISA 923 Q? 92 125 


> Frame 2: 126 bytes on wire (1608 bits), 126 bytes captured (1008 bits) on interface @ 
> Ethernet II, Src: IntelCor 38:be:bd (7c:5c:f8:38:be:bd), Dst: AsustekC 35:e4:c8 (1c:87:2 


Result : 


Thus the Network Commands are studied in detail. 


Page | 6 


EX 2 : Implementation of ECHO server 
Aim : 
To implement echo server and client using TCP sockets. 
Algorithm: 
CLIENT SIDE 


1. Create a socket which binds the Ip address of server and the port address to acquire 
service. 
2. After establishing connection send a data to server. 


OO 


. Receive and print the same data from server. 
4. Close the socket. 


SERVER SIDE 


. Create a server socket to activate the port address. 

. Create a socket for the server socket which accepts the connection. 
. After establishing connection receive the data from client. 

. Print and send the same data to client. 

. Close the socket. 


nA BW N Ar 


pyEchoClient.py 


import socket 

HOST = '127.0.0.1' 

PORT = 9999 

s = socket.socket(socket.AF_INET, socket.SOCK STREAM) 
s.connect((HOST, PORT)) 

str ='Hello, world' 

b = str.encode(‘utf-8') 

s.send(b) 

data = s.recv(1024) 

s.close() 


print ('Received', data) 


pyEchoServere.py 


import socket 


HOST = '127.0.0.1' 


PORT = 9999 


s = socket.socket(socket.AF_INET, socket.SOCK STREAM) 


s.bind((HOST, PORT)) 
s.listen(1) 
conn, addr = s.accept() 
print (‘Connected by’, addr) 
while 1: 
data = conn.recv(1024) 
print(data) 
if not data: break 
conn.send(data) 
conn.close() 


Sample Input/Output : 


D:\NW_LAB>py pyEchoerver.py 


Connected by ('127.0.0.1', 51252) 'Hello, world’ 


D:\NW_LAB>py pyEchoClient.py 


Received 'Hello, world' 


Result: 


Thus data from client to server is echoed back to the client. 


EX 3: Implementation of TCP client/server chat 
Aim : 

To implement chatting between client and server using TCP. 
Algorithm: 
Server 


Step1: Start the program and create server and client sockets. 
Step2: Use input streams to get the message from user. 
Step3: Use output streams to send message to the client. 


Step4: Wait for client to display this message and write a new one to be displayed by 
the server. 


Step5: Display message given at client using input streams read from socket. 
Step6: Stop the program. 
Client 


Step1: Start the program and create a client socket that connects to the required host 
and port. 


Step2: Use input streams read message given by server and print it. 
Step3: Use input streams; get the message from user to be given to the server. 
Step4: Use output streams to write message to the server. 


Step5: Stop the program. 


Pyserver.py 


import socket 
def server_program(): # get the hostname 
host = socket.gethostname() 
port = 5000  # initiate port no above 1024 
server_socket = socket.socket() # get instance 
# look closely. The bind() function takes tuple as argument 
server_socket.bind((host, port)) 
# bind host address and porttogether 
# configure how many client the server can listen simultaneously 


server_socket.listen(2) 


conn, address = server_socket.accept() 
# accept new connection print("Connection from: " + str(address)) 
while True: 
# receive data stream. it won't accept data packet greater than 1024 bytes 
data = conn.recv(1024).decode() 
if not data: 
# if data is not received break 
break 
print( "from connected user: " + str(data)) 
data = input( -> ') 
conn.send(data.encode()) # send data to the client 
conn.close() #close the connection 
if name --' main : 


server program() 


pyclient.py 


import socket 
def client program): 
print('type bye to terminate') 
host = socket.gethostname() # as both code is running on same pc 
port = 5000 # socket server port number 
client socket = socket.socket() # instantiate 
client socket.connect((host, port)) # connect to the server 
message = input(" -> ") # take input 
while message.lower().strip() != 'bye': 
client_socket.send(message.encode()) # send message 
data = client_socket.recv(1024).decode() # receive response 
print('Received from server: ' + data)# show in terminal 


message = input(" -> ") # again take input 
10 


client socket.close() # close the connection 


f 


if name =='_main_': 


client program() 


Sample Input/Output : 


ID:\NW_LAB> py pyclient.py 

type bye to terminate 

->hai server 

IReceived from server: hai client 

-> how r u 

Received from server: imfine . how r u 


-> fine thanks 


D:ANW_LAB>py pyserver.py 


connected user: hai server 
->hai client 

from connected user: how r u 
->im fine . how r u 


from connected user: fine thanks 


Connection from: ('192.168.56.1', 50141) from 


| -> bye 
Received from server: bye 
ID:\NW_LAB> 
-> bye 
ID:\NW_LAB> 
Result : 


Thus chatting between client and server is implemented successfully. 
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Ex 4: Executing Remote Command 
Aim : 
To execute command from the remote host. 
Algorithm : 


Step1: Create a server(sender) socket at the server side. 


Step2: Create a socket at the client side and the connection is set to accept by the server 
socket using the accept () method. 


Step3: In the client side the remote command to be executed is given as input. 
Step4: The command is obtained using the WMI 


Step5: execute the command using conn.Win32 Process. 


pip install wmi 

How do I use it? Import wmi 

c = wmi.WMI() 

for s in c.Win32_Service(StartMode=" Auto", State="Stopped"): 
ifraw_input("Restart os? " % s.Caption).upper() == "Y": 


s.StartService() 


RemoteSender.py 


# importing socket module 

import socket 

UDP_IP = "localhost" 

UDP_PORT = 8080 

MESSAGE = "notepad" 

print ("message:", MESSAGE) 

sock = socket.socket(socket.AF_INET, socket. SOCK_DGRAM) 
sock.sendto(bytes( MESSAGE, "utf-8"), (UDP IP, UDP_PORT)) 


RemoteReceiver.py 


# importing socket module 


import socket 
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import wmi 
UDP_IP = "localhost" 
UDP_PORT = 8080 
sock = socket.socket(socket.AF_INET, socket. SOCK_DGRAM) 
sock.bind((UDP IP, UDP_PORT)) # 
while True: # buffer size is 1024 bytes 
data, addr = sock.recvfrom(1024) 
str=data.decode("utf-8") 
print ("Received message:", str) 
print(" opening ", str); 
conn = wmi.WMI() 
pid, returnval= conn.Win32_Process.Create(CommandLine=str) 


Sample Input /Output : 


\NW_LAB>py RemoteSender.py D:\NW_LAB>py RemoteReceiver.py 


essage: notepad Received message: notepad 


opening notepad 


Result : 


Thus the command from remote host executed successfully. 
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Ex 5 : ARP/RARP implementation 
Aim : 


To know the Physical Address of the node when communication taken place between host 
to host using ARP. 


Introduction : 


Most of the computer programs/applications use logical address (IP address) to 
send/receive messages, however the actual communication happens over the physical 
address (MAC address) i.e from layer 2 of OSI model. So our mission is to get the 
destination MAC address which helps in communicating with other devices. This is where 
ARP comes into the picture, its functionality is to translate IP address to physical address. 


IP 


ARP 


MAC 


The acronym ARP stands for Address Resolution Protocol which is one of the most 
important protocols of the Network layer in the OSI model. 


Note: ARP finds the hardware address, also known as Media Access Control (MAC) 
address, of a host from its known IP address. 


Algorithm: 


Step 1: Initialize the string of ip addresses. 

Step 2: For every ip address, assign an ethernetaddress . 

Step 3: To Perform ARP, enter the ip address. 

Step 4: The equivalent ethernet address is displayed. 

Step 5: If the ethernet address is not found, then 'not found' message is displayed. 
Step 6: To Perform RARP, enter the ethernet address. 

Step 7: The equivalent ip address is displayed. 

Step 8: If the ip address is not found, then 'not found' message is displayed. 

Step 9: Provide option to perform both ARP and RARP. 


Step 10:Choose Exit option to terminate the program. 
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ARPClient.py 

# importing socket module 

import socket 

UDP_IP = "localhost" 

UDP_PORT = 8080 

MESSAGE = "172.16.1.8" 

print ("message:", MESSAGE) 

sock = socket.socket(socket.AF_INET, socket. SOCK_DGRAM) 
sock.sendto(bytes( MESSAGE, "utf-8"), (UDP IP, UDP PORT)) 


ARPserver.py 
import socket 


UDP_IP = "localhost" 
UDP_PORT = 8080 
sock = socket.socket(socket.AF_INET, socket. SOCK_DGRAM) 
sock.bind((UDP_IP, UDP PORT)) 
ip=["172.16.1.9","172.16.1.8"] 
mac=["6A:08:AA:C2","8A:BC:E3:FA"] 
while True: 
# buffer size is 1024 bytes 
data, addr = sock.recvfrom(1024) 
strl = data.decode(‘utf-8') 
1 = len(data) 
if 1 !=0: 
print( "Received message:", str1) 
break 
for x in ip: 
if strl in x: 
ind=ip.index(str1) 
print("the MAC address is: ",mac[ind]) 
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Sample Input / Output: 
D:\NW_LAB>py arp. client.py message: 172.16.1.8 
D:\NW_LAB>py arp server.py Received message: 172.16.1.8 
the MAC address is: 8A:BC:E3:FA 


Result : 
Thus the MAC address is displayed using ARP. 
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EX 6 :Downloading a Web Page using Socket 
Aim : 
To download the Web page using Socket. 
procedure: 


Import urllib.request package. If not available download using the command pip install 
urllib 
Coding.py 


import urllib.request 


urllib.request.urlretrieve ("http://www.example.org/", "webpage.html") 


# read local file 
for line in open(‘webpage.html’): print(line.strip()) 
Sample Input /output: 


D:\NW_LAB>py page_down.py 

<!doctype html> 

<html> 

<head> 

<title>Example Domain</title> 

<meta charset="utf-8" /> 

<meta http-equiv="Content-type" content="text/html; charset=utf-8" /> 
<meta name="viewport" content="width=device-width, initial-scale=1" /> 
<style type="text/css"> 

body { 

background-color: #f0f0f2; margin: 0; 

padding: 0; 


font-family: -apple-system, system-ui, BlinkMacSystemFont, "Segoe UI", "Open Sans", 
"Helvetica Neue", Helvetica, Arial, sans-serif; 


} 

div { 

width: 600px; margin: 5em auto; padding: 2em; 
background-color: #fdfdff; border-radius: 0.5em; 


box-shadow: 2px 3px 7px 2px rgba(0,0,0,0.02); 
17 


} 

a:link, a:visited ( color: #38488f; 
text-decoration: none; 

} 

@media (max-width: 700px) { div { 
margin: 0 auto; width: auto; 

} 

} 

</style> 


</head> 


<body> 
<div> 
<h1>Example Domain</h1> 


<p>This domain is for use in illustrative examples in documents. You may use this domain 
in literature without prior coordination or asking for permission.</p> 


<p><a href="https://www.iana.org/domains/example">More information...</a></p> 


</div> 
</body> 
</html> 


Result : 


Thus the Web Page downloaded successfully using python socket. 
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Ex 7 : Implementation of FTP 


Aim: To send files from local host to server using FTP. 


Procedure (Server): The server will host the network using the assigned host and port using 


which the client will connect to the server. The server will act as the sender and the user will 


have to input the filename of the file that he/she would like to transmit. The user must make 


sure that the file that needs to be sent is in the same directory as the "server.py" program. 


Procedure (Client): The client program will prompt the user to enter the host address of the 


server while the port will already be assigned to the port variable. Once the client program has 


connected to the server it will ask the user for a filename to be used for the file that will be 


received from the server. Lastly the client program will receive the file and leave it in the same 


directory under the same filename set as the user. 


Algorithm: server side 


L 


Create an object of server socket class and listen for incoming client connection in a specified 
port. 


When a client connection is established, create input and output streams for this connection. 


While (true) 

a. Read a file name from the input stream. 

b. Read the content of the file requested by the client. 
c. Send the file content to the client. 

d. Close server and client socket. 


Algorithm: client side 


le 


2 
3: 
4. 
5 


Establish a connection to the server program. Use IP address and port number of the server. 
Create input and output streams for the established connection. 

Read filename from the keyboard and send to the server. 

Display contents of file sent to the server. 


Close the connection. 
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Server Coding: 
import socket 


s = socket.socket() 


host = socket.gethostname() #Get localhost IP address 


port = 8080 #assign port for session 

s.bind((host, port)) #bind the socket to assigned host IP and port 
s.listen(1) #put the socket into listening mode for 1 client 
print(host) 


print(" Waiting for any incoming connection... ") 
conn, addr = s.accept() 


print(addr, "Has connected to the server") 


filename = input(str( "Enter the name of the file to be transmitted: ")) 


file = open(filename , 'rb')  # Opens a file for reading only in binary format 


file_data = file.read(1024) 
conn.send(file_data) 


print("File has been transmitted successfully") 


Client Coding: 


import socket 

s = socket.socket() 

host = input(str( "Please enter the host address of the sender: ")) 

port = 8080 

s.connect((host,port)) 

print("Connected ... ") 

filename = input(str( "Please enter a filename for the incoming file: ")) 
file = open(filename, 'Wb') # Opens a file for writing only in binary format 
file data = s.recv(1024) 

file.write(file data) 

file.close() 


print("File has been received successfully.") 
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Sample Input and Output : 


Windows 1: (server.py) 


Dell  (# localhost name) 

Waiting for any incoming connection... 
('192.168.43.193', 49395) Has connected to the server 
Enter the name of the file to be transmitted: ex1.py 


File has been transmitted successfully 


Windows 2: (client.py) 


Please enter the host address of the sender: Dell 
Connected ... 
Please enter a name for the incoming file: exercisel.py 


File has been received successfully. 


Result: 


Thus, a program has been written to send files from local host to server using FTP. 
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Ex 8: Encryption /Decryption 
Aim: 
To Encrypt and decrypt the message. 
Introduction : 


The Caesar Cipher technique is one of the earliest and simplest method of encryption technique. It’s 
simply a type of substitution cipher, i.e., each letter of a given text is replaced by a letter some fixed 
number of positions down the alphabet. For example with a shift of 1, A would be replaced by B, B 
would become C, and so on. The method is apparently named after Julius Caesar, who apparently 
used it to communicate with his officials. 


Thus to cipher a given text we need an integer value, known as shift which indicates the number of 
position each letter of the text has been moved down. 


The encryption can be represented using modular arithmetic by first transforming the letters into 
numbers, according to the scheme, A = 0, B = 1,..., Z = 25. Encryption of a letter by a shift n can 
be described mathematically as. 


FEAT) => (x + n)mod 26 
(Encryption Phase with shift n} 
IA) — (x — n)mod 26 


(Decryption Phase with shift n) 


Algorithm: 


For Encryption 
1. Read the string to be encrypted. 
2. Input the shift positions 
3. If the character in the text is uppercase then 


4. cipher = cipher + chr((ord(char) + shift - 65) % 26 + 65) 
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5. else 
6. cipher = cipher + chr((ord(char) + shift - 97) % 26 + 97) 


7. print cipher 


For Decryption: 
1. Read the ciphertext to be decrypted. 


2. Input the shift positions 


3. If the character in the text is uppercase then 
4. cipher = cipher + chr((ord(char) - shift - 65) % 26 + 65) 
5. else 
6. cipher = cipher + chr((ord(char) -shift - 97) % 26 + 97) 
7. print original text 

Encrypt.py 


def encrypt(string, shift): 
cipher =" 
for char in string: 
if char == ' ': 
cipher = cipher + char 
elif char.isupper(): 
cipher = cipher + chr((ord(char) + shift - 65) % 26 + 65) 
else: 
cipher = cipher + chr((ord(char) + shift - 97) % 26 + 97) 
return cipher 
text = input("enter string: ") 
s = int(input("enter shift number: ")) 
print("original string: ", text) 
print("after encryption: ", encrypt(text, s)) 
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Decrypt.py 
def encrypt(string, shift): 
cipher =" 
for char in string: 
if char == ' ': 
cipher = cipher + char 
elif char.isupper(): 
cipher = cipher + chr((ord(char) - shift - 65) % 26 + 65) 
else: 
cipher = cipher + chr((ord(char) -shift - 97) % 26 + 97) 
return cipher 
text = input("enter string: ") 
s = int(input("enter shift number: ")) 
print("original string: ", text) 
print("after encryption: ", encrypt(text, s)) 


Sample Input / Output : 


G:\NW\NW_LAB>py encrypt.py G:\NW\NW_LAB>py decrypt.py 

enter string: Annamalai University enter string: Erreqepem Yrmzivwmxc 

enter shift number: 4 enter shift number: 4 

original string: Annamalai University original string: ErreqepemYrmzivwmxc 

after encryption: Erreqepem Yrmzivwmxc after decryption: Annamalai University 
Result : 


Thus the message is Encrypted and Decrypted Successfully. 
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Ex 9 : Study of Network Simulator 
Aim : 
To study in detail about the Network Simulator. 


Theory : 

Neni Simulator (Version 2), widely known as NS2, is simply an event driven simulation tool 
that has proved useful in studying the dynamic nature of communication networks. Simulation of 
wired as well as wireless network functions and protocols (e.g., routing algorithms, TCP, UDP) can 
be done using NS2. In general, NS2 provides users with a way of specifying such network protocols 
and simulating their corresponding behaviors. Due to its flexibility and modular nature, NS2 has 
gained constant popularity in the networking research community since its birth in 1989. Ever 
since, several revolutions and revisions have marked the growing maturity of the tool, thanks to 
substantial contributions from the players in the field. Among these are the University of California 
and Cornell University who developed the REAL network simulator,1 the foundation which NS is 
based on. Since 1995 the Defense Advanced Research Projects Agency (DARPA) supported 
development of NS through the Virtual Inter Network Testbed (VINT) project . Currently the 
National Science Foundation (NSF) has joined the ride in development. Last but not the least, the 
group of Researchers and developers in the community are constantly working to keep NS2 strong 
andversatile. 


BasicArchitecture : 


Pal T TOCL A1 tia. 
Tel č Simulation Simulation ®} | Simulation 

Simulation | Objects / ` Objects ri Trace 
Seript —— — File 
= m NS? Shall Execulable Command (ns) i = 

l a i I i _ l 

1 NAM i | Xgraph | 

(Animation); | (Plotting) | 


BASIC Architecture of NS 


Figure above shows the basic architecture of NS2. NS2 provides users with an executable command 
ns which takes on input argument, the name of a Tcl simulation scripting file. Users are feeding the 
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name of a Tcl simulation script (which sets up a simulation) as an input argument of an NS2 
executable command ns. 


In most cases, a simulation trace file is created, and is used to plot graph and/or to create animation. 
NS2 consists of two key languages: C++ and Object-oriented Tool Command Language (OTcl). 
While the C++ defines the internal mechanism (i.e., a backend) of the simulation objects, the OTcl 
sets up simulation by assembling and configuring the objects as well as scheduling discrete events 
(i.e., a frontend). 


The C++ and the OTcl are linked together using TclCL. Mapped to a C++ object, variables in the 
OTcl domains are sometimes referred to as handles. Conceptually, a handle (e.g., n as a Node 
handle) is just a string (e.g.,_010) in the OTcl domain, and does not contain any functionality. 
Instead, the functionality (e.g., receiving a packet) is defined in the mapped C++ object (e.g., of 
class Connector). In the OTcl domain, a handle acts as a frontend which interacts with users and 
other OTclobjects. It may defines its own procedures and variables to facilitate the interaction. Note 
that the member procedures and variables in the OTcl domain are called instance procedures 
(instprocs) and instance variables (instvars), respectively. Before proceeding further, the readers are 
encouraged to learn C++ and OTcl languages. We refer the readers to [14] for the detail of C++, 
while a brief tutorial of Tcl and OTcl tutorial. 


NS2 provides a large number of built-in C++ objects. It is advisable to use these C++ objects to set 
up a simulation using a Tcl simulation script. However, advance users may find these objects 
insufficient. They need to develop their own C++ objects, and use aOTcl configuration interface to 
put together these objects. After simulation, NS2 outputs either text-based or animation-based 
simulation results. To interpret these results graphically and interactively, tools such as NAM 
(Network AniMator) and XGraph are used. To analyze a particular behaviour of the network, users 
can extract a relevant subset of text-based data and transform it to a more conceivable presentation. 


Concept Overview: 


NS uses two languages because simulator has two different kinds of things it needs to do. On one 
hand,detailed simulations of protocols requires a systems programming language which can 
efficiently manipulate bytes, packet headers, and implement algorithms that run over large data 
sets. For these tasks run-time speed is important and turn-around time (run simulation, find bug, fix 
bug, recompile, re-run) is less important. On the other hand, a large part of network research 
involves slightly varying parameters or configurations, or quickly exploring a number of scenarios. 


In these cases, iteration time (change the model and re-run) is more important. Since configuration 
runs once (at the beginning of the simulation), run-time of this part of the task is less important. ns 
meets both of these needs with two languages, C++ and OTcl. 


Tcl scripting 

Tcl is a general purpose scripting language. [Interpreter] 

e Tcl runs on most of the platforms such as Unix, Windows, andMac. 
e The strength of Tcl is itssimplicity. 
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e Itis not necessary to declare a data type for variable prior to theusage. 


Basics of TCL 

Syntax: command arg1 arg2 arg3 

Hello World! 

putsstdout{ Hello, World!} Hello, World! 


Variables Command Substitution 
set a 5 set len [string length foobar] 
set b $a set len [expr [string length foobar] + 9] 


Wired TCL Script Components 

Create the event scheduler 

Open new files & turn on the tracing Create the nodes 
Setup the links 

Configure the traffic type (e.g., TCP, UDP, etc) 

Set the time of traffic generation (e.g., CBR, FTP) 
Terminate the simulation 


NS Simulator Preliminaries. 

1. Initialization and termination aspects of the nssimulator. 
2. Definition of network nodes, links, queues andtopology. 
3. Definition of agents and ofapplications. 

4. The nam visualizationtool. 

5. Tracing and randomvariables. 


Initialization and Termination of TCL Script in NS-2 


An ns simulation starts with the command 
set ns [new Simulator] 


Which is thus the first line in the tcl script. This line declares a new variable as using the set 
command, you can call this variable as you wish, In general people declares it as ns because it is an 
instance of the Simulator class, so an object the code[new Simulator] is indeed the installation of 
the class Simulator using the reserved word new. 


In order to have output files with data on the simulation (trace files) or files used for visualization 
(nam files), we need to create the files using —open command: 


#Open the Trace file 
set tracefile1 [open out.tr w] 
Sns trace-all Stracefile1 
#Open the NAM trace file 
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Set namfile [open out.nam w] 

$ns namtrace-all $namfile 
The above creates a dta trace file called out.tr and a nam visualization trace file called 
out.nam.Within the tcl script, these files are not called explicitly by their names, but instead by 
pointers that are declared above and called —tracefilel and —namfile respectively. Remark that 
they begins with a # symbol. The second line open the file —out.tr to be used for writing, declared 
with the letter —w. The third line uses a simulator method called trace-all that have as parameter 
the name of the file where the traces will go. 
Define a “finish” procedure 


Proc finish { } { 

global ns tracefile1 namfile 
$ns flush-trace 

Close Stracefile1 

Close $namfile 

Exec namout.nam& 

Exit 0 


} 


Definition of a network of links and nodes 
The way to define a node is 
set n0 [$ns node] 


Once we define several nodes, we can define the links that connect them. An example of a 
definition of a link is: 
Sns duplex-link $n0 Sn2 10Mb 10ms DropTail 


Which means that $n0 and $n2 are connected using a bi-directional link that has 10ms of 
propagation delay and a capacity of 10Mb per sec for each direction. 

To define a directional link instead of a bi-directional one, we should replace —duplex-link 
by—simplex-link. 

In ns, an output queue of a node is implemented as a part of each link whose input is that node. We 
should also define the buffer capacity of the queue related to each link. An example would be: 


#set Queue Size of link (n0-n2) to 20 
$ns queue-limit $n0 $n2 20 


FTP over TCP 
TCP is a dynamic reliable congestion control protocol. It uses Acknowledgements created by the 
destination to know whether packets are well received. 
There are number variants of the TCP protocol, such as Tahoe, Reno, NewReno, Vegas. The type 
of agent appears in the first line: 
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Set tcp [new Agent/TCP] 


The command $ns attach-agent $n0 $tcpdefines the source node of the tcp connection. 
The command set sink [new Agent /TCPSink] Defines the behavior of the destination 
node of TCP and assigns to it a pointer called sink. 


#Setup a UDP 

connection set 

udp [new 

Agent/UDP] 

$ns attach-agent 

$n1 $udp set null 

[new Agent/Null] 

$ns attach-agent $n5 $null 
$ns connect $udp $null 
$udp set fid_2 


#setup a CBR over UDP connection 

The below shows the definition of a CBR application using a UDP agent 

The command $ns attach-agent $n4 $sink defines the destination node. The command $ns 
connect 

$tep $sink finally makes the TCP connection between the source and destination nodes. 


setcbr [new Application/Traffic/CBR] 
$cbr attach-agent $udp 

$cbr set packetsize_ 100 

Scbr set rate 0.01Mb 

Scbr set random false 


TCP has many parameters with initial fixed defaults values that can be changed if 
mentioned explicitly. For example, the default TCP packet size has a size of 
1000bytes.This can be changed to another value, say 552bytes, using the command Stcp 
set packetSize 552. 

When we have several flows, we may wish to distinguish them so that we can identify 
them with different colors in the visualization part. This is done by the command $tep set 
fid_ 1 that assigns to 
theTCPconnectionaflowidentificationof—1.Weshalllatergivetheflowidentificationof—2lto 
the UDPconnection. 


Result: 
Thus the Network Simulator is studied in detail. 
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Ex 10 :Network Topology 
Aim : 


To create scenario and study the performance of token bus, token Ring and token Star protocol 
through simulation. 


Theory : 


Token bus is a LAN protocol operating in the MAC layer. Token bus is standardized as per IEEE 
802.4. Token bus can operate at speeds of 5Mbps, 10 Mbps and 20 Mbps. The operation of token 
bus is as follows: Unlike token ring in token bus the ring topology is virtually created and 
maintained by the protocol. A node can receive data even if it is not part of the virtual ring, a node 
joins the virtual ring only if it has data to transmit. In token bus data is transmitted to the destination 
node only where as other control frames is hop to hop. After each data transmission there is a 
solicit successsor control frame transmitted which reduces the performance of the protocol. 


Token ring is a LAN protocol operating in the MAC layer. Token ring is standardized as per IEEE 
802.5. Token ring can operate at speeds of 4mbps and 16 mbps. The operation of token ring is as 
follows: When there is no traffic on the network a simple 3-byte token circulates the ring. If the 
token is free (no reserved by a station of higher priority as explained later) then the station may 
seize the token and start sending the data frame. As the frame travels around the ring ach station 
examines the destination address and is either forwarded (if the recipient is another node) or copied. 
After copying4 bits of the last byte is changed. This packet then continues around the ring till it 
reaches the originating station. After the frame makes a round trip the sender receives the frame and 
releases a new token onto the ring. 


Star networks are one of the most common computer network topologies. In its simplest form, a 
star network consists of one central switch, hub or computer, which acts as a conduit to transmit 
messages. This consists of a central node, to which all other nodes are connected, this central node 
provides a common connection point for all nodes through a hub. In star topology, every node 
(computer workstation or any other peripheral) is connected to a central node called a hub or 
switch. The switch is the server and the peripherals are the clients. Thus, the hub and leaf nodes, 
and the transmission lines between them, form a graph with the topology of a star. If the central 
node is passive, the originating node must be able to tolerate the reception of an echo of its own 
transmission, delayed by the two-way transmission time (i.e. to and from the central node) plus any 
delay generated in the central node. An active star network has an active central node that usually 
has the means to prevent echo-related problems. 


The star topology reduces the damage caused by line failure by connecting all of the systems to a 

central node. When applied to a bus-based network, this central hub rebroadcasts all transmissions 

received from any peripheral node to all peripheral nodes on the network, sometimes including the 
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originating node. All peripheral nodes may thus communicate with all others by transmitting to, and 


receiving from, the central node only. The failure of a transmission line linking any peripheral node 
to the central node will result in the isolation of that peripheral node from all others, but the rest of 
the systems will be unaffected. 


Algorithm : 
Token Bus 


1. 
2. 
3. 


Create a simulator object 
Define different colors for different data flows 


Open a nam trace file and define finish procedure then close the trace file, and execute nam on 
trace file. 


Create five nodes that forms a network numbered from 0 to 4 


Create duplex links between the nodes and add Orientation to the nodes for setting a LAN 
topology 


Setup TCP Connection between n(1) and n(3) 
Apply CBR Traffic over TCP. 


Schedule events and run the program. 


Token Ring : 


1. 
2 
3. 


D N A Mm A 


Create a simulator object 
Define different colors for different data flows 


Open a nam trace file and define finish procedure then close the trace file, and execute nam on 
trace file. 


. Create five nodes that forms a network numbered from 0 to 4 

. Create duplex links between the nodes to form a Ring Topology. 
. Setup TCP Connection between n(1) and n(3) 

. Apply CBR Traffic over TCP 


. Schedule events and run the program. 


Token Star : 


1. 
2. 
3. 


Create a simulator object 
Define different colors for different data flows 


Open a nam trace file and define finish procedure then close the trace file, and execute nam on 
trace file. 
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Create six nodes that forms a network numbered from 0 to 5 
Create duplex links between the nodes to form a STAR Topology 


Setup TCP Connection between n(1) and n(3) 


SL LON CA 


Apply CBR Traffic over TCP 


8. Schedule events and run the program. 


Program : 
Token Bus 


#Create a simulator object 
set ns [new Simulator] 


#Open the nam trace file 
set nf [open out.nam w] 
$ns namtrace-all $nf 


#Define a 'finish' procedure 
proc finish () { 

global ns nf 

$ns flush-trace 

#Close the trace file 

close $nf 

#Execute nam on the trace file 
exec nam out.nam & 

exit 0 


} 


#Create five nodes 
set nO [$ns node] 
set nl [Sns node] 

set n2 [$ns node] 

set n3 [Sns node] 

set n4 [Sns node] 

#CreateLan between the nodes 

set lanO [$ns newLan "Sn0 $n1 $n2 $n3 Sn4" 0.5Mb 40ms LL Queue/DropTail MAC/Csma/Cd 
Channel] 


#Create a TCP agent and attach it to node nO 
set tcp0 [new Agent/TCP] 

$tcpO set class 1 

$ns attach-agent $n1 $tcp0 


#Create a TCP Sink agent (a traffic sink) for TCP and attach it to node n3 
set sink0 [new Agent/TCPSink] 
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$ns attach-agent $n3 $sinkO 


#Connect the traffic sources with the traffic sink 
Sns connect $tcpO Ssink0 


# Create a CBR traffic source and attach it to tcp0 
set cbr0 [new Application/Traffic/CBR] 

Scbr0 set packetSize 500 

Scbr0 set interval 0.01 

Scbr0 attach-agent StcpO 


#Schedule events for the CBR agents 
Sns at 0.5 "$cbr0 start" 
Sns at 4.5 "Scbr0 stop" 


#Call the finish procedure after 5 seconds of simulation time 
Sns at 5.0 "finish" 


#Run the simulation 
Sns run 


Token Ring 


#Create a simulator object 
set ns [new Simulator] 


#Open the nam trace file 
set nf [open out.nam w] 
Sns namtrace-all Snf 


#Define a 'finish' procedure 
proc finish () { 

global ns nf 

$ns flush-trace 

#Close the trace file 

close $nf 

#Execute nam on the trace file 
exec nam out.nam & 

exit 0 


} 


#Create five nodes 
set nO [$ns node] 
set nl [Sns node] 
set n2 [$ns node] 
set n3 [$ns node] 
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set n4 [$ns node] 
set n5 [$ns node] 


#Create links between the nodes 

$ns duplex-link $n0 $n1 1Mb 10ms DropTail 
$ns duplex-link $n1 $n2 1Mb 10ms DropTail 
$ns duplex-link $n2 $n3 1Mb 10ms DropTail 
$ns duplex-link $n3 $n4 1Mb 10ms DropTail 
$ns duplex-link $n4 $n5 1Mb 10ms DropTail 
$ns duplex-link $n5 $n0 1Mb 10ms DropTail 


#Create a TCP agent and attach it to node nO 
set tcp0 [new Agent/TCP] 

$tcp0 set class 1 

$ns attach-agent $n1 $tcpO 


#Create a TCP Sink agent (a traffic sink) for TCP and attach it to node n3 
set sinkO [new Agent/TCPSink] 
$ns attach-agent $n3 $sinkO 


#Connect the traffic sources with the traffic sink 
$ns connect $tcp0 Ssink0 


# Create a CBR traffic source and attach it to tcpO 
set cbr0 [new Application/Traffic/CBR] 

Scbr0 set packetSize_ 500 

Scbr0 set interval 0.01 

Scbr0 attach-agent $tcp0 


#Schedule events for the CBR agents 


Sns at 0.5 "$cbr0 start" 
Sns at 4.5 "Scbr0 stop" 


#Call the finish procedure after 5 seconds of simulation time 
Sns at 5.0 "finish" 


#Run the simulation 
Sns run 


Token Star : 


#Create a simulator object 
set ns [new Simulator] 


#Open the nam trace file 
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set nf [open out.nam w] 
$ns namtrace-all $nf 


#Define a 'finish' procedure 
proc finish () { 

global ns nf 

$ns flush-trace 

#Close the trace file 

close $nf 

#Executenam on the trace file 
exec nam out.nam & 

exit0 

} 

#Create six nodes 

set nO [$ns node] 

set nl [$ns node] 
set n2 [$ns node] 
set n3 [$ns node] 
set n4 [$ns node] 
set n5 [$ns node] 


#Change the shape of center node in a star topology 
Sn0 shape square 


#Create links between the nodes 

$ns duplex-link $n0 $n1 1Mb 10ms DropTail 
$ns duplex-link $n0 $n2 1Mb 10ms DropTail 
$ns duplex-link $n0 $n3 1Mb 10ms DropTail 
$ns duplex-link $n0 $n4 1Mb 10ms DropTail 
Sns duplex-link $n0 $n5 1Mb 10ms DropTail 


#Create a TCP agent and attach it to node nO 
set tcp0 [new Agent/TCP] 

$tcp0 set class 1 

$ns attach-agent $n1 $tcpO 


#Create a TCP Sink agent (a traffic sink) for TCP and attach it to node n3 
set sinkO [new Agent/TCPSink] 
$ns attach-agent $n3 $sinkO 


#Connect the traffic sources with the traffic sink 
$ns connect $tcp0 Ssink0 


# Create a CBR traffic source and attach it to tcp0 set cbr0 [new Application/Traffic/CBR] 
set cbr0 [new Application/Traffic/CBR] 

Scbr0 set packetSize 500 

Scbr0 set interval 0.01 

Scbr0 attach-agent $tcp0 
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#Schedule events for the CBR agents 
$ns at 0.5 "$cbr0 start" 
$ns at 4.5 "Scbr0 stop" 


#Call the finish procedure after 5 seconds of simulation time 
Sns at 5.0 "finish" 


#Run the simulation 
Sns run 


Sample Input / Output : 


@ Applications Places System @ © Z Thu Mar 17, 10:42AM q &@ root 


| Cc [new - File Browser] E root@home:~/new 


@ Applications Places System @ (à A Thu Mar17,10:41AM qp Æ root 
= mif 


= [new - File Browser] Æ root@home:~/new [m nam:outnam | m Nam Console v1.13 


@ Applications Places system @ (à Thu Mar 17, 10:42AM "dp 8? root 


“CC Inew- File Browser] | root@home:=/new |T Nam Console vi.13 [= nam: /fotnew/outnam_) 


Result : 


Thus the Bus, Ring and star Topology was simulated and studied. 
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Aim: 


Ex 11(a) : Simulation of Go Back N Protocol 


To Simulate and to study of Go Back N protocol 


Theory: 


Go Back N is a connection oriented transmission. The sender transmits the frames continuously. 
Each frame in the buffer has a sequence number starting from 1 and increasing up to the window 
size. The sender has a window i.e. a buffer to store the frames. This buffer size is the number of 
frames to be transmitted continuously. The size of the window depends on the protocol designer. 


Operations: 
1. A station may send multiple frames as allowed by the window size. 


2. Receiver sends an ACK i if frame i has an error. After that, the receiver discards all incoming 
frames until the frame with error is correctly retransmitted. 

3. If sender receives an ACK i it will retransmit frame i and all packets i+1, i+2,... which have 
been sent, but not been acknowledged. 


Algorithm for Go BackN : 


1. 
2: 


The source node transmits the frames continuously. 


Each frame in the buffer has a sequence number starting from 1 and increasing up to the 
window size. 


The source node has a window i.e. a buffer to store the frames. This buffer size is the 
number of frames to be transmitted continuously. 


The size of the window depends on the protocol designer. 


For the first frame, the receiving node forms a positive acknowledgement if the frame is 
received without error. 


If subsequent frames are received without error (up to window size) cumulative positive 
acknowledgement is formed. 


If the subsequent frame is received with error, the cumulative acknowledgment error-free 
frames are transmitted. If in the same window two frames or more frames are received with 
error, the second and the subsequent error frames are neglected. Similarly even the frames 
received without error after the receipt of a frame with error are neglected. 
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Go Back N 
Window size = 4 
Sender Receiver 
Sends packets 


1-4 - 
( ) Error Receives packet 1 correctly 
= 


Discards packet 3 
s"ADiscards packet 4 
Receives Go Back N Sends Go Back N 


request for packet2 request for packet2 
Resends packets (2 - 4) 


Receives packet (2 - 4) correctly 


Request for packet 5 
sends packet (5 - 8) 


(AAA! 


Receives packet (5 - 8) correctly 


8. The source node retransmits all frames of window from the first error frame. 


9. If the frames are errorless in the next transmission and if the acknowledgment is error free, 
the window slides by the number of error-free frames being transmitted. 


10. If the acknowledgment is transmitted with error, all the frames of window at source are 
retransmitted, and window doesn’t slide. 


11. This concept of repeating the transmission from the first error frame in the window is called 
as GOBACKNtransmission flow control protocol. 


Program : 
#send packets one by one 


set ns [new Simulator] 


set nO [$ns node 
set nl [$ns node 
set n2 [$ns node 
set n3 [$ns node 


set n4 [$ns node 


] 
] 
] 
] 
] 
] 


set n5 [Sns node 


Sn0 color "purple" 
Sn1 color "purple" 
$n2 color "violet" 


$n3 color "violet" 
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$n4 color "chocolate" 


$n5 color "chocolate" 


Sn0 shape box ; 
$n1 shape box ; 
$n2 shape box ; 
$n3 shape box ; 
$n4 shape box ; 


$n5 shape box ; 


$ns at 0.0 "$n0 label SYSO" 
Sns at 0.0 "$n1 label SYS1" 
$ns at 0.0 "$n2 label SYS2" 
Sns at 0.0 "Sn3 label SYS3" 
$ns at 0.0 "$n4 label SYS4" 
Sns at 0.0 "$n5 label SYSS" 


set nf [open goback.nam w] 
$ns namtrace-all $nf 
set f [open goback.tr w] 


$ns trace-all $f 


$ns duplex-link $n0 $n2 1Mb 20ms DropTail 
$ns duplex-link-op $n0 $n2 orient right-down 
Sns queue-limit $n0 $n2 5 

$ns duplex-link $n1 $n2 1Mb 20ms DropTail 
$ns duplex-link-op $n1 $n2 orient right-up 
$ns duplex-link $n2 $n3 1Mb 20ms DropTail 
$ns duplex-link-op $n2 $n3 orient right 

$ns duplex-link $n3 Sn4 1Mb 20ms DropTail 


$ns duplex-link-op $n3 $n4 orient right-up 
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Sns duplex-link $n3 $n5 1Mb 20ms DropTail 


$ns duplex-link-op $n3 $n5 orient right-down 


Agent/TCP set nam tracevar true 


set tcp [new Agent/TCP] 

Stcp set fid 1 

Sns attach-agent $n1 $tcp 

set sink [new Agent/TCPSink] 
Sns attach-agent Sn4 Ssink 
Sns connect Stcp Ssink 

set ftp [new Application/FTP] 
Sftp attach-agent Stcp 


Sns at 0.05 "Sftp start" 

Sns at 0.06 "$tcp set windowlnit 6" 

Sns at 0.06 "Stcp set maxcwnd 6" 

$ns at 0.25 "Sns queue-limit $n3 $n4 0" 
$ns at 0.26 "$ns queue-limit $n3 $n4 10" 


$ns at 0.305 "Stcp set windowlnit 4" 


Sns at 0.305 "Stcp set maxcwnd 4" 


Sns at 1.5 "finish" 


$ns at 1.0 "Sns trace-annotate \"FTP stops\"" 


proc finish {} { 


$ns at 0.368 "Sns detach-agent Sn1 Stcp ; Sns detach-agent $n4 $sink" 


$ns at 0.0 "Sns trace-annotate \"Goback N end\"" 

$ns at 0.05 "$ns trace-annotate \"FTP starts at 0.01\"" 

$ns at 0.06 "$ns trace-annotate \"Send 6Packets from SYS1 to SYS4\"" 

$ns at 0.26 "$ns trace-annotate \"Error Occurs for 4th packet so not sent ack for the Packet 


$ns at 0.30 "Sns trace-annotate \"Retransmit Packet 4 to 6\"" 


nn 
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global ns nf 

$ns flush-trace 

close $nf 

puts "filtering..." 

#exec tclsh../bin/namfilter.tcl goback.nam 
#puts "running nam..." 

exec nam goback.nam & 

exit 0 


} 


$ns run 


Sample Input /Output : 


"NONA Thu Mar17,11:05AM fi 


GG mamagebadenam. 7 Nom Console vi 13 


Result: 


Thus the Go Back N Protocols are Simulated and studied. 
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Ex 11(b) : Simulation of Selective Repeat Protocol 
Aim : 
To Simulate and to study of Go Back N protocol 
Theory: 


Selective Repeat ARQ is a specific instance of the Automatic Repeat-reQuest (ARQ) Protocol. It 
may be used as a protocol for the delivery and acknowledgement of message units, or it may be 
used as a protocol for the delivery of subdivided message sub-units. When used as the protocol for 
the delivery of messages, the sending process continues to send a number of frames specified by a 
window size even after a frame loss. Unlike Go- Back-N ARQ, the receiving process will continue 
to accept and acknowledge frames sent after an initial error. The receiver process keeps track of the 
sequence number of the earliest frame it has not received, and sends that number with every ACK it 
sends. If a frame from the sender does not reach the receiver, the sender continues to send 
subsequent frames until it has emptied its window. The receiver continues to fill its receiving 
window with the subsequent frames, replying each time with an ACK containing the sequence 
number of the earliest missing frame. Once the sender has sent all the frames in its window, it re- 
sends the frame number given by the ACKs, and then continues where it left off. The size of the 
sending and receiving windows must be equal, and half the maximum sequence number (assuming 
that sequence numbers are numbered from O to n-1) to avoid miscommunication in all cases of 
packets being dropped. To understand this, consider the case when all ACKs are destroyed. If the 
receiving window is larger than half the maximum sequence number, some, possibly even all, of 
the packages that are resent after timeouts are duplicates that are not recognized as such. The sender 
moves its window for every packet that is acknowledged. 


Advantage over Go Back N: 
1. Fewer retransmissions. 


Disadvantages: 
1. More complexity at sender and receiver 
2: Receiver may receive frames out of sequence 


Algorithm : SELECTIVE REPEAT 

1. The source node transmits the frames continuously. 

2. Each frame in the buffer has a sequence number starting from 1 and increasing up to the 
window size. 

3. The source node has a window i.e. a buffer to store the frames. This buffer size is the number 
of frames to be transmitted continuously. 

4. The receiver has a buffer to store the received frames. The size of the buffer depends upon the 
window size defined by the protocol designer. 


5. The size of the window depends according to the protocol designer. 
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10. 


11. 


The source node transmits frames continuously till the window size is exhausted. If any of the 
frames are received with error only those frames are requested for retransmission (with a 
negative acknowledgement) 

If all the frames are received without error, a cumulative positive acknowledgement is sent. 

If there is an error in frame 3, an acknowledgement for the frame 2 is sent and then only Frame 
3 is retransmitted. Now the window slides to get the next frames to the window. 

If acknowledgment is transmitted with error, all the frames of window are retransmitted. Else 
ordinary window sliding takes place. (* In implementation part, Acknowledgment error is not 
considered) 

If all the frames transmitted are errorless the next transmission is carried out for the new 
window. 

This concept of repeating the transmission for the error frames only is called Selective Repeat 
transmission flow control protocol. 


Selective Repeat 


Window size = 4 
Sender 


Sends packets 
(1-4) 


Receiver request for packet2 
Resends only packet 2 


Receiver request for (5 - 8) 


Sends packets 5-8 


#PROGRAM FOR SELECTIVE REPEAT: 


#send packets one by one 
set ns [new Simulator] 


set n0 [$ns node 
set nl [$ns node 
set n2 [$ns node 
set n3 [$ns node 
set n4 [$ns node 
set n5 [$ns node 


] 
] 
] 
] 
] 
] 


$n0 color "red" 
$n1 color "red" 
Sn2 color "green" 
Sn3 color "green" 
Sn4 color "black" 
$n5 color "black" 


Receiver 


Receives packet 1 correctly 


Sends Selective Repeat 
request for packet2 


Receives packet 2 correctly 
Sends request for( 5 - 8) 


| 


>. 
Receives packet (5 - 8) correctly 
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$n0 shape circle ; 
$n1 shape circle ; 
$n2 shape circle ; 
$n3 shape circle ; 
$n4 shape circle ; 
$n5 shape circle ; 


$ns at 0.0 "Sn0 label SYS1" 
Sns at 0.0 "$n1 label SYS2" 
Sns at 0.0 "Sn2 label SYS3" 
Sns at 0.0 "Sn3 label SYS4" 
Sns at 0.0 "$n4 label SYS5" 
Sns at 0.0 "Sn5 label SYS6" 


set nf [open Srepeat.nam w] 
Sns namtrace-all Snf 

set f [open Srepeat.tr w] 
Sns trace-all Sf 


Sns queue-limit $n0 $n2 5 


$ns duplex-link-op $n2 $n3 orient right 


Agent/TCP set_nam_tracevar_true 


set tcp [new Agent/TCP] 

Stcp set fid 1 

$ns attach-agent $n1 Stcp 

set sink [new Agent/TCPSink] 
Sns attach-agent Sn4 Ssink 
Sns connect Stcp Ssink 

set ftp [new Application/FTP] 
Sftp attach-agent Stcp 


Sns at 0.05 "Sftp start" 

Sns at 0.06 "$tcp set windowlnit 8" 

Sns at 0.06 "Stcp set maxcwnd 8" 

Sns at 0.25 "Sns queue-limit $n3 $n4 0" 
$ns at 0.26 "Sns queue-limit $n3 Sn4 10" 
$ns at 0.30 "Stcp set windowlnit 1" 


$ns duplex-link $n0 $n2 1Mb 10ms DropTail 
$ns duplex-link-op $n0 $n2 orient right-down 


Sns duplex-link $n1 $n2 1Mb 10ms DropTail 
$ns duplex-link-op $n1 $n2 orient right-up 
$ns duplex-link $n2 $n3 1Mb 10ms DropTail 


$ns duplex-link $n3 $n4 1Mb 10ms DropTail 
$ns duplex-link-op $n3 $n4 orient right-up 

$ns duplex-link $n3 $n5 1Mb 10ms DropTail 
$ns duplex-link-op $n3 $n5 orient right-down 
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$ns at 0.30 "$tcp set maxcwnd 1" 

$ns at 0.30 "$ns queue-limit $n3 $n4 10" 

$ns at 0.47 "$ns detach-agent $n1 $tcp;$ns detach-agent $n4 $sink" 
$ns at 1.75 "finish" 

$ns at 0.0 "Sns trace-annotate \"Select and repeat 
$ns at 0.05 "$ns trace-annotate \"FTP starts at 0.01\"" 

$ns at 0.06 "$ns trace-annotate \"Send 8Packets from SYS1 to SYS4\"'" 

$ns at 0.26 "Sns trace-annotate \"Error Occurs in 4th packet N"" 

Sns at 0.30 "$ns trace-annotate \"Retransmit Packet 4 from SYS1 to SYS4\"" 
$ns at 1.5 "Sns trace-annotate \"FTP stops\"" 


we 


proc finish {} { 

global ns nf 

$ns flush-trace 

close $nf 

puts "filtering..." 

#exec tclsh../bin/namfilter.tcl srepeat.nam 
#puts "running nam..." 

exec nam Srepeat.nam & 

exit 0 


} 


$ns run 


Sample Input /Output : 


@ Applications Places system @ © Z Thu Mar 17, 11:05AM q 8f root 


fam: jrooUnew)Srepeat.nam 


“4 4 . > » nagapi E2200 
es | FI 


\ sys3 De” VA 
=> | 


SYS2 7 IN SYS6 
O ©) 


new - File Browser M root@home:—/new = Nam Console v1.13 M nam: jrootnew/Srepea... Ci  N:] 


Result : 


Thus the Selective Repeat Protocols are Simulated and studied. 
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EX 12:Simulation of TCP/IP Data Transfer 
Aim : 
To transfer data between client and server using TCP/IP. 


Algorithm : 


1. Create a simulator object 
2. Define different colors for different data flows 


3. Open a nam trace file and define finish procedure then close the trace file, and execute nam on 
trace file. 


4. Create six nodes that forms a network numbered from 0 to 3 
5. Create duplex links between the nodes to form a Topology 
6. Setup TCP Connection between n(0) and n(3) 

7. Apply FTP Traffic over TCP 


8. Schedule events and run the program. 


Program : 
set ns [new Simulator] 


set nf [open out.nam w] 


$ns namtrace-all $nf 


set tr [open out.tr w] 


$ns trace-all $tr 


proc finish () { 
global nf ns tr 

$ns flush-trace 

close $tr 

exec nam out.nam & 
exit 0 


} 
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set nO [$ns node] 
set n1 [Sns node] 
set n2 [$ns node] 


set n3 [$ns node] 


$ns duplex-link $n0 $n1 10Mb 10ms DropTail 
$ns duplex-link $n1 $n3 10Mb 10ms DropTail 
$ns duplex-link $n2 $n1 10Mb 10ms DropTail 
$ns duplex-link-op $n0 $n1 orient right-down 


$ns duplex-link-op $n1 $n3 orient right 


$ns duplex-link-op $n2 $n1 orient right-up 


set tcp [new Agent/TCP] 


Sns attach-agent Sn0 Stcp 


set ftp [new Application/FTP] 
Sftp attach-agent Stcp 


set sink [new Agent/TCPSink] 


Sns attach-agent $n3 Ssink 


set udp [new Agent/UDP] 
Sns attach-agent Sn2 Sudp 


set cbr [new Application/Traffic/CBR] 
Scbr attach-agent Sudp 


set null [new Agent/Null] 


$ns attach-agent $n3 $null 


$ns connect $tcp $sink 
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$ns connect $udp $null 


$ns rtmodel-at 1.0 down $n1 $n3 
$ns rtmodel-at 2.0 up $n1 $n3 


$ns rtproto DV 
$ns at 0.0 "$ftp start" 
$ns at 0.0 "$cbr start" 


$ns at 5.0 "finish" 
$ns run 


Sample Input /Output : 


File Views Analysis | A | 
pa SSS as E] (SSS bh lad | 3,415388 | Step: 2,0ms 
Es 
ay 
S 
ba 
ED 
IT 
© 
o 


ON 
Q QO 
O 


FI JZ 


| | S POS ee | L Il l l Ù I II I | L l l l |Ù | I I |I | l |l qe l l l I LI I I I I I I| I 
IF 
| | 


Result : 


Thus the data has been transfer between client and server using TCP/IP is executed successfully. 
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EX13 (a) Simulation of Distance Vector Routing Algorithm 
Aim: 

To simulate and study the Distance Vector routing algorithm using simulation. 
Theory: 


Distance Vector Routing is one of the routing algorithm in a Wide Area Network for computing 
shortest path between source and destination. The Router is one main devices used in a wide area 
network. The main task of the router is Routing. It forms the routing table and delivers the packets 
depending upon the routes in the table-either directly or via an intermediate devices. 


Each router initially has information about its all neighbors. Then this information will be shared 
among nodes. 


Algorithm: 


1. Create a simulator object 

2. Define different colors for different data flows 

3. Open a nam trace file and define finish procedure then close the trace file, and execute nam on 
trace file. 

. Create n number of nodes using for loop 

. Create duplex links between the nodes 

. Setup UDP Connection between n(0) and n(5) 

. Setup another UDP connection between n(1) and n(5) 

. Apply CBR Traffic over both UDP connections 
. Choose distance vector routing protocol to transmit data from sender to receiver. 

10. Schedule events and run the program. 


© © NN A Un Ff 


Program:DV.tcl 
set ns [new Simulator] 


set nr [open thro.tr w] 


$ns trace-all $nr 


set nf [open thro.nam w] 


$ns namtrace-all $nf 
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proc finish { } { 
global ns nr nf 
$ns flush-trace 
close $nf 
close $nr 
exec nam thro.nam & 


exit 0 


for { setiO } { $i< 12} { incril } { 


set n($i) [$ns node]} 


for {set i 0} {$i< 8} {incr i} { 


$ns duplex-link $n(0) $n(8) 1Mb 10ms DropTail 


$ns duplex-link $n(1) $n(10) 1Mb 10ms DropTail 


Sns duplex-link $n(0) $n(9) 1Mb 10ms DropTail 


Sns duplex-link Sn(9) $n(11) 1Mb 10ms DropTail 


Sns duplex-link $n(10) Sn(11) 1Mb 10ms DropTail 


Sns duplex-link Sn(1 1) $n(5) 1Mb 10ms DropTail 


set udp0 [new Agent/UDP] 

$ns attach-agent $n(0) Sudp0 

set cbr0 [new Application/Traffic/CBR] 
Scbr0 set packetSize 500 


Scbr0 set interval 0.005 


Sns duplex-link Sn(Si) Sn([expr $i+1]) 1Mb 10ms DropTail } 
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Scbr0 attach-agent $udp0 
set null0 [new Agent/Null] 


$ns attach-agent $n(5) $nullO 


$ns connect Sudp0 Snull0 


set udpl [new Agent/UDP] 


Sns attach-agent $n(1) $udp1 


set cbrl [new Application/Traffic/CBR] 


$cbr1 set packetSize 500 
$cbr1 set interval 0.005 


$cbr1 attach-agent Sudp1 


set null0 [new Agent/Null] 
$ns attach-agent $n(5) Snull0 


$ns connect Sudp1 Snull0 


$ns rtproto DV 


$ns rtmodel-at 10.0 down $n(11) $n(5) 


$ns rtmodel-at 15.0 down $n(7) $n(6) 


$ns rtmodel-at 30.0 up $n(11) $n(5) 


$ns rtmodel-at 20.0 up $n(7) $n(6) 


$udp0 set fid_ 1 
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$udp1 set fid_ 2 


$ns color 1 Red 


$ns color 2 Green 


$ns at 1.0 "$cbr0 start" 
$ns at 2.0 "$cbr1 start" 
$ns at 45 "finish" 
$ns run 
It will run and open NAM ( network Animator) 


Sample Input /Output : 


@ Applications Places System @ (à A 


Thu Mar17,10:48AM p 88 root 


Click play button to see the animation of Distance --vector routing 
Result: 


Thus the Distance vector Routing Algorithm was Simulated and studied. 
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Ex13(b) Simulation of Link State Routing Algorithm 
Aim: 
To simulate and study the link state routing algorithm using simulation. 
Theory: 


In link state routing, each router shares its knowledge of its neighborhood with every other router in 
the internet work. (1) Knowledge about Neighborhood: Instead of sending its entire routing table a 
router sends info about its neighborhood only. (ii) To all Routers: each router sends this information 
to every other router on the internet work not just to its neighbor .It does so by a process called 
flooding. (111)Information sharing when there is a change: Each router sends out information about 
the neighbors when there is change. 


Procedure: 


The Dijkstra algorithm follows four steps to discover what is called the shortest path tree(routing 
table) for each router:The algorithm begins to build the tree by identifying its roots. The root 
router’s trees the router itself. The algorithm then attaches all nodes that can be reached from the 
root. The algorithm compares the tree’s temporary arcs and identifies the arc with the lowest 
cumulative cost. This arc and the node to which it connects are now a permanent part of the shortest 
path tree. The algorithm examines the database and identifies every node that can be reached from 
its chosen node. These nodes and their arcs are added temporarily to the tree. 


The last two steps are repeated until every node in the network has become a permanent part of the 
tree. 


Algorithm: 


1. Create a simulator object 

2. Define different colors for different data flows 

3. Open a nam trace file and define finish procedure then close the trace file, and execute nam on 
trace file. 

. Create n number of nodes using for loop 

. Create duplex links between the nodes 

. Setup UDP Connection between n(0) and n(5) 

. Setup another UDP connection between n(1) and n(5) 

. Apply CBR Traffic over both UDP connections 
. Choose Link state routing protocol to transmit data from sender to receiver. 


© 0 NN Mm UA À 


10. Schedule events and run the program. 
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Program: 


set ns [new Simulator] 

set nr [open thro.tr w] 

$ns trace-all $nr 

set nf [open thro.nam w] 

$ns namtrace-all $nf 

proc finish { } { 

global ns nr nf 

$ns flush-trace 

close $nf 

close $nr 

exec nam thro.nam & 

exit 0 

} 

for { seti0 } { $i< 12} { incri 1 } { 

set n($i) [$ns node]} 

for {seti0} {$i< 8} {incri} { 

$ns duplex-link $n($i) Sn([expr $i+1]) 1Mb 10ms DropTail } 
$ns duplex-link $n(0) $n(8) 1Mb 10ms DropTail 
Sns duplex-link $n(1) $n(10) 1Mb 10ms DropTail 
$ns duplex-link $n(0) $n(9) 1Mb 10ms DropTail 
Sns duplex-link Sn(9) $n(11) 1Mb 10ms DropTail 
$ns duplex-link $n(10) $n(11) 1Mb 10ms DropTail 
$ns duplex-link $n(11) $n(5) 1Mb 10ms DropTail 
set udp0 [new Agent/UDP] 


$ns attach-agent $n(0) Sudp0 

set cbr0 [new Application/Traffic/CBR] 
Scbr0 set packetSize 500 

Scbr0 set interval 0.005 

Scbr0 attach-agent $udp0 
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set null0 [new Agent/Null] 

$ns attach-agent $n(5) $null0 

Sns connect Sudp0 Snull0 

set udpl [new Agent/UDP] 

Sns attach-agent $n(1) $udp1 

set cbrl [new Application/Traffic/CBR] 
$cbr1 set packetSize 500 

$cbr1 set interval 0.005 

Scbr1 attach-agent Sudp1 

set null0 [new Agent/Null] 

Sns attach-agent $n(5) $null0 

Sns connect Sudp1 $null0 

Sns rtproto LS 

Sns rtmodel-at 10.0 down Sn(11) Sn(5) 
$ns rtmodel-at 15.0 down $n(7) Sn(6) 
Sns rtmodel-at 30.0 up Sn(11) Sn(5) 
Sns rtmodel-at 20.0 up $n(7) $n(6) 
Sudp0 set fid_ 1 

$udp1 set fid_ 2 

Sns color 1 Red 

Sns color 2 Green 

Sns at 1.0 "Scbr0 start" 

Sns at 2.0 "$cbr1 start" 

Sns at 45 "finish" 


Sns run 


Run the above |s.tcl 


It will run and open NAM ( network Animator) 
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Sample Input /Output : 


@ Applications Places System @ (o Z ThuMar17,10:46AM "gp 82 root 


t 
ABT TATA a awo wona aaoo lovalova vow anoano 
fas cr [ors fo _retiyeut| reset] 


| = [new - File Browser] [ M Nam Console v1.13 


Click play button to see the animation of Distance --vector routing 
Result: 


Thus the Link State Routing Algorithm was Simulated and studied. 


Page | 57 


Ex 14 :Simulate a MobileAdhoc Network 
Aim: 
To simulate a Mobile Adhoc network (MANET). 
Theory : 


A mobile ad hoc network or MANET does not depend on a fixed infrastructure 
for its networking operation. MANET is an autonomous and short-lived 
association of group of mobile nodes that communicate with each other over 
wireless links. A node can directly communicate to the nodes that lie within its 
communication range. If a node wants to communicate with a node that is not 
directly within its communication range, it uses intermediate nodes as routers. 


Algorithm: 


1. Create a simulator object 
2. Set the values for the parameter 
3. Open a nam trace file and define finish procedure then close the trace file, and 
execute nam on trace file. 
4. Create the nodes that forms a network numbered from 0 to 3 
5. Schedule events and run the program. 
Program : 


set val(chan) Channel/WirelessChannel 
set val(prop) Propagation/TwoRayGround 
set val(netif) Phy/WirelessPhy 

set val(mac) Mac/802_11 

set val(ifq) Queue/DropTail/PriQueue 

set val(Il) LL 

set val(ant) Antenna/OmniAntenna 

set val(ifqlen) 50 

set val(nn) 3 

set val(rp) DSDV 


set ns [new Simulator] 


set tf [open output.tr w] 
Sns trace-all Stf 


set tf1 [open output.nam w] 

Sns namtrace-all-wireless $tf1 100 100 
set topo [new Topography] 

Stopo load flatgrid 100 100 
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create-god $val(nn) 


$ns node-config -adhoc Routing $val(rp) \ 


-IType Sval(I1) \ 
-macType $val(mac) \ 
-ifqT ype $val(ifq) \ 
-ifqLen $val(ifqlen) \ 
-antType $val(ant) \ 
-propType $val(prop) \ 
-phyType $val(netif) \ 
-channelType $val(chan) \ 
-topolnstance $topo \ 
-agentTrace ON \ 
-router Trace OFF \ 
-macTrace OFF \ 
-movementTrace OFF 


set node0 [$ns node] 
set nodel [$ns node] 
set node2 [$ns node] 


Sns initial node pos Snode0 10 
Sns initial node pos Snodel 10 
Sns initial node pos Snode2 10 


Snode0 setX 25.0 
Snode0 set Y 50.0 
Snode0 setZ 0.0 


Snodel setX 50.0 
Snodel setY 50.0 
Snodel setZ 0.0 


Snode2 setX 65.0 
$node2 set Y 50.0 
$node2 set Z_ 0.0 


set tcpl [new Agent/TCP] 

Sns attach-agent $node Stcp1 
set ftp [new Application/FTP] 
$ftp attach-agent Stcp1 
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set sinkl [new Agent/TCPSink] 
$ns attach-agent $node2 $sink1 


Sns connect Stcp1 $sink1 


Sns at 10.0 "$nodel set dest 50.0 90.0 0.0" 
$ns at 50.0 "$nodel set dest 50.0 10.0 0.0" 


$ns at 0.5 "$ftp start" 
$ns at 1000 "$ftp stop" 


$ns at 1000 "finish" 


proc finish {} { 

global ns tf tfl 

Sns flush-trace 

close Stf 

exec nam output.nam & 
exit 0 


} 


$ns run 
Sample Input / Output : 


@ Applications Places System @ ò Z $ © d æÆ FriApr20, 1:55PM root 


= nam: ex2 09hr002.nam Jale 


FT 
( E root@home:-/man || nam: ex2_09hr002.nam || ™ [Nam Console v1.13] | com 2 
Result: 


Thus the mobile adhoc network is simulated successfully 
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Ex 15. : Implement Transport Control Protocol in 


Sensor Network 
Aim: 


To implement a Transport Control Protocol in sensor network through the 
simulator. 


Theory: 


The Transmission Control Protocol (TCP) is one of the main protocols of the 
Internet protocol suite. It originated in the initial network implementation in 
which it complemented the Internet Protocol (IP). Therefore, the entire suite is 
commonly referred to as TCP/IP. TCP provides reliable, ordered, and error- 
checked delivery of a stream of octets (bytes) between applications running on 
hosts communicating by an IP network. Major Internet applications such as the 
World Wide Web, email, remote administration, and file transfer rely on TCP. 
Applications that do not require reliable data stream service may use the User 
Datagram Protocol (UDP), which provides a connectionless datagram service that 
emphasizes reduced latency over reliability. 


Algorithm: 


1. Create a simulator object 

2. Define different colors for different data flows 

3. Open a nam trace file and define finish procedure then close the trace file, and 
execute nam on trace file. 

4. Create six nodes that forms a network numbered from 0 to 5 

5. Create duplex links between the nodes and add Orientation to the nodes for 

setting a LAN topology 

Setup TCP Connection between n(0) and n(4) 

Apply FTP Traffic over TCP 

Setup UDP Connection between n(1) and n(5) 

Apply CBR Traffic over UDP. 

0. Schedule events and run the program. 


Sorna 


Program: 
set ns [new Simulator] 


#Define different colors for data flows (for NAM) 
Sns color 1 Blue 

Sns color 2 Red 

#Open the Trace files 

set filel [open out.tr w] 
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set winfile [open WinFile w] 
$ns trace-all Sfilel 


#Open the NAM trace file 
set file2 [open out.nam w] 
$ns namtrace-all $file2 


#Define a 'finish' procedure 
proc finish () { 

global ns filel file2 

Sns flush-trace 

close Sfilel 

close Sfile2 

exec nam out.nam & 

exit 0 


} 


#Create six nodes 
set nO [$ns node] 
set nl [$ns node] 
set n2 [$ns node] 
set n3 [$ns node] 
set n4 [$ns node] 
set n5 [$ns node] 
$n1 color red 

Sn1 shape box 


#Create links between the nodes 

$ns duplex-link $n0 $n2 2Mb 10ms DropTail 

$ns duplex-link $n1 $n2 2Mb 10ms DropTail 

$ns simplex-link $n2 $n3 0.3Mb 100ms DropTail 

$ns simplex-link $n3 $n2 0.3Mb 100ms DropTail 

set lan [$ns newLan "$n3 $n4 $n5" 0.5Mb 40ms LL Queue/DropTail 
MAC/Csma/Cd Channel] 


#Setup a TCP connection 

set tcp [new Agent/TCP/Newreno] 

Sns attach-agent $n0 $tcp 

set sink [new Agent/TCPSink/DelAck] 
$ns attach-agent $n4 $sink 

$ns connect $tcp $sink 

$tcp set fid_ 1 

$tcp set window_ 8000 

$tcp set packetSize_ 552 
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#Setup a FTP over TCP connection 
set ftp [new Application/FTP] 

$ftp attach-agent $tcp 

$ftp set type_ FTP 


$ns at 1.0 "Sftp start" 
Sns at 124.0 "Sftp stop" 


# next procedure gets two arguments: the name of the # tcp source node, will be 
called here "tcp", 
# and the name of output file. 


proc plotWindow {tcpSource file) { 

global ns 

set time 0.1 

set now [$ns now] 

set cwnd [$tcpSource set cwnd_] 

set wnd [$tcpSource set window_] 

puts $file "$now $cwnd" 

$ns at [expr $now+$time] "plotWindow $tcpSource $file" } 
$ns at 0.1 "plotWindow $tcp $winfile" 

Sns at 5 "Sns trace-annotate \"packet drop\"" 


# PPP 


$ns at 125.0 "finish" 
$ns run 
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Sample Input / Output : 


nam: /root/out.nam SHOES 


|| 


T 
LICE SE EE DORR ERE ORD OS SE DEN OOA OES O AS O O EE OG S DO A E SOE E A E a E 


fais or ozs fox reagon | veset | 


Result : 


Thus the Transport control protocol in sensor network is simulated successfully. 
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